home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1994 November / macformat-018.iso / Shareware City / Sound / K1 Librarian 1.0.2 / Sample Scripts / 27 Exchange Patches < prev   
Encoding:
Text File  |  1994-07-26  |  129 b   |  6 lines  |  [TEXT/ToyS]
  1. tell application "K1 Librarian"
  2.     activate -- if needed
  3.     set Patch 0 of Window 1 to 1
  4.     -- exchange 0 and 1 (eg. 1 and 2)
  5. end tell
  6.